#About Times of India

Libraries used.

## 
## Attaching package: 'igraph'
## The following objects are masked from 'package:stats':
## 
##     decompose, spectrum
## The following object is masked from 'package:base':
## 
##     union
## Loading required package: ggplot2
## Registered S3 methods overwritten by 'ggplot2':
##   method         from 
##   [.quosures     rlang
##   c.quosures     rlang
##   print.quosures rlang
## 
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
## 
##     last_plot
## The following object is masked from 'package:igraph':
## 
##     groups
## The following object is masked from 'package:stats':
## 
##     filter
## The following object is masked from 'package:graphics':
## 
##     layout
## Loading required package: lubridate
## 
## Attaching package: 'lubridate'
## The following object is masked from 'package:igraph':
## 
##     %--%
## The following objects are masked from 'package:data.table':
## 
##     hour, isoweek, mday, minute, month, quarter, second, wday,
##     week, yday, year
## The following object is masked from 'package:base':
## 
##     date
## Loading required package: PerformanceAnalytics
## Loading required package: xts
## Loading required package: zoo
## 
## Attaching package: 'zoo'
## The following objects are masked from 'package:base':
## 
##     as.Date, as.Date.numeric
## Registered S3 method overwritten by 'xts':
##   method     from
##   as.zoo.xts zoo
## 
## Attaching package: 'xts'
## The following objects are masked from 'package:data.table':
## 
##     first, last
## 
## Attaching package: 'PerformanceAnalytics'
## The following object is masked from 'package:graphics':
## 
##     legend
## Loading required package: quantmod
## Loading required package: TTR
## Registered S3 method overwritten by 'quantmod':
##   method            from
##   as.zoo.data.frame zoo
## Version 0.4-0 included new data defaults. See ?getSymbols.
## Loading required package: tidyverse
## -- Attaching packages ------------------------------------------------------------------------------------------------------------------- tidyverse 1.2.1 --
## v tibble  2.1.1     v purrr   0.3.2
## v tidyr   0.8.3     v dplyr   0.8.1
## v readr   1.3.1     v stringr 1.4.0
## v tibble  2.1.1     v forcats 0.4.0
## -- Conflicts ---------------------------------------------------------------------------------------------------------------------- tidyverse_conflicts() --
## x lubridate::%--%()        masks igraph::%--%()
## x lubridate::as.difftime() masks base::as.difftime()
## x dplyr::as_data_frame()   masks tibble::as_data_frame(), igraph::as_data_frame()
## x dplyr::between()         masks data.table::between()
## x dplyr::combine()         masks gridExtra::combine()
## x purrr::compose()         masks igraph::compose()
## x tidyr::crossing()        masks igraph::crossing()
## x lubridate::date()        masks base::date()
## x dplyr::filter()          masks plotly::filter(), stats::filter()
## x dplyr::first()           masks xts::first(), data.table::first()
## x dplyr::groups()          masks plotly::groups(), igraph::groups()
## x lubridate::hour()        masks data.table::hour()
## x lubridate::intersect()   masks base::intersect()
## x lubridate::isoweek()     masks data.table::isoweek()
## x dplyr::lag()             masks stats::lag()
## x dplyr::last()            masks xts::last(), data.table::last()
## x lubridate::mday()        masks data.table::mday()
## x lubridate::minute()      masks data.table::minute()
## x lubridate::month()       masks data.table::month()
## x lubridate::quarter()     masks data.table::quarter()
## x lubridate::second()      masks data.table::second()
## x lubridate::setdiff()     masks base::setdiff()
## x purrr::simplify()        masks igraph::simplify()
## x purrr::transpose()       masks data.table::transpose()
## x lubridate::union()       masks igraph::union(), base::union()
## x lubridate::wday()        masks data.table::wday()
## x lubridate::week()        masks data.table::week()
## x lubridate::yday()        masks data.table::yday()
## x lubridate::year()        masks data.table::year()
## Loading required package: NLP
## 
## Attaching package: 'NLP'
## The following object is masked from 'package:ggplot2':
## 
##     annotate

Reading all CSv files into R.

Removing all NA ’s in the data

## [1] 0

Renaming the column.

converting the fromate of date column Extracting the months

## Joining, by = "word"

##Binary sentiment Analysis

###Percentage of Sentiments in Employees Reviews

## Joining, by = "word"

Positive Negative sentiments trend by Months

Positive Negative sentiments trend by weekDays

## Joining, by = "word"

## Selecting by n

###Multiple sentiments Analysis

we have 6 different type sentiments:-

1)Fear. 2)Joy. 3)Negative. 4)Positive. 5)Sadness 6)Trust

## Joining, by = "word"

###Percentage of Sentiments in Employees Reviews

## Joining, by = "word"

By Month

## Joining, by = "word"
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): birthday could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): killing could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): dance could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): happy could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): leave could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): marriage could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): young could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): sex could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): award could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): delay could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): finally could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): rescue could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): mother could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): create could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): electric could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): violence could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): theft could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): denied could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): beach could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): highest could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): black could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): surprise could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): violation could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): promise could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): robbery could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): late could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): alive could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): remove could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): weight could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): peace could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): broken could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): journey could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): rejects could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): inter could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): garden could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): abuse could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): victory could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): victim could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): friendly could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): lover could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): steal could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): surgery could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): church could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): improve could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): ministry could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): score could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): abandoned could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): supreme could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): hanging could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): tender could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): brother could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): collapse could not be fit on page. It will not be
## plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): status could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): lead could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): perfect could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): white could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): league could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): sunny could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): sun could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): problem could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): boycott could not be fit on page. It will not be plotted.
## Warning in comparison.cloud(., colors = viridis_pal(option = "D")(4),
## max.words = 200): celebration could not be fit on page. It will not be
## plotted.

## Selecting by n

Topic Modeling

This are the count of Most common words

## Joining, by = "word"
## Joining, by = "word"